A = readmatrix ('CD_500_750nm.txt')
B = readmatrix ('laser_power.txt')

z = B(:,2)

x1 = A(:,1)
y1 = A(:,2)*6./z
y2 = A(:,3)*6./z


hold on
plot(x1,y2,LineWidth=1,Color=[0.8 0 0])
plot(x1,y1,LineWidth=1,Color=[0 0 0.8])
xlim([500,750])
xticks(500:50:750)
ylim([0,0.105])
yticks([0:0.05:0.1])
xlabel('Wavelength [nm]')
ylabel('Photocurrent [pA/W]')
set(gca,'XMinorTick','on','YMinorTick','on')
set(gca,'box','on','Xcolor',[0 0 0],'Ycolor',[0 0 0])
hold off
box on
set(gcf,'Position',[0, 0, 200, 190])